home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 109 / EnigmaAmiga109CD.iso / dalla rivista / netconnect3 / cmanager / rexx / sendphone.rexx < prev    next >
OS/2 REXX Batch file  |  1998-09-25  |  389b  |  26 lines
  1. /*
  2.  *
  3.  *  $VER: SendPhone.rexx 1.2 (5.8.98) by Simone Tellini
  4.  *
  5.  */
  6.  
  7. Options Results
  8. Parse Arg args
  9.  
  10. IF ~SHOW(P,'STFAX.1') THEN DO
  11.  
  12.     Address Command 'Run <>NIL: STFax:STFax'
  13.  
  14.     Address Command 'WaitForPort STFAX.1'   /* let's give it some time */
  15.     Address Command 'WaitForPort STFAX.1'
  16.     Address Command 'WaitForPort STFAX.1'
  17.  
  18. END
  19.  
  20. Address 'STFAX.1'
  21.  
  22. 'SHOW'
  23. 'DIAL' args
  24.  
  25. Exit 0
  26.